function [ C1, R1, C2, R2, C3, R3 ] = get_amiga_filter_params( amiga_model )

h = fopen('amiga_filters.csv');
d = textscan(h, '%q %f %f %f %f %f %f', 'HeaderLines', 1, ...
    'delimiter', ';', 'CollectOutput', true);
fclose(h);
%names = d{1,1};
data = d{1,2};

amiga_model = lower(amiga_model);

switch amiga_model
    case 'a500'
        index = 1;
    case 'a500 #2'
        index = 2;
    case 'a500 winuae'
        index = 15;
    case 'a500 plus'
        index = 3;
    case 'a600'
        index = 4;
    case 'a1000'
        error('not implemented');
    case 'a1200'
        index = 6;
    case 'a1200 #2'
        index = 7;
    case 'a2000 #1'
        index = 8;
    case 'a1200 winuae'
        index = 16;
    case 'a2000 #2'
        index = 9;
    case 'a2000 #3'
        error('not implemented');
    case 'a3000'
        index = 11;
    case 'cd32'
        index = 12;
    case 'cdtv'
        index = 13;
    case 'a4000'
        index = 14;
    otherwise
        error('bad amiga model');
end

C1 = data(index, 1);
R1 = data(index, 2);
R2 = data(index, 3);
R3 = data(index, 4);
C2 = data(index, 5);
C3 = data(index, 6);

end